﻿Public Class Registre
    Public Id As Integer
    Public Id_Compte As Integer
    Public date_entree As Date
    Public date_sortie As Date
   'Les constructeur ------------------------

    Sub New(ByVal Id As Integer, ByVal Id_Compte As Integer, ByVal date_entree As Date, ByVal date_sortie As Date)
        Me.Id = Id
        Me.date_entree = date_entree
        Me.date_sortie = date_sortie
        Me.Id_Compte = Id_Compte
    End Sub
    Sub New()

    End Sub

    'les listes ------------------------------




    'les fonctions ------------------------


End Class
